home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / cocktail / puma.lha / puma / src / TypeTab.c < prev    next >
Text File  |  1992-09-25  |  4KB  |  118 lines
  1. int
  2. # define beginint(a)        
  3. # define closeint(a)        
  4. # define readint(a)        (void) fscanf (yyf, "%d", & a);
  5. # define writeint(a)        (void) fprintf (yyf, "%d", a);
  6. # define getint(a)        yyGet ((char *) & a, sizeof (a));
  7. # define putint(a)        yyPut ((char *) & a, sizeof (a));
  8. # define copyint(a, b)        
  9. # define equalint(a, b)        a == b
  10. short
  11. # define beginshort(a)        
  12. # define closeshort(a)        
  13. # define readshort(a)        (void) fscanf (yyf, "%hd", & a);
  14. # define writeshort(a)        (void) fprintf (yyf, "%hd", a);
  15. # define getshort(a)        yyGet ((char *) & a, sizeof (a));
  16. # define putshort(a)        yyPut ((char *) & a, sizeof (a));
  17. # define copyshort(a, b)        
  18. # define equalshort(a, b)    a == b
  19. long
  20. # define beginlong(a)        
  21. # define closelong(a)        
  22. # define readlong(a)        (void) fscanf (yyf, "%ld", & a);
  23. # define writelong(a)        (void) fprintf (yyf, "%ld", a);
  24. # define getlong(a)        yyGet ((char *) & a, sizeof (a));
  25. # define putlong(a)        yyPut ((char *) & a, sizeof (a));
  26. # define copylong(a, b)        
  27. # define equallong(a, b)    a == b
  28. unsigned
  29. # define beginunsigned(a)    
  30. # define closeunsigned(a)    
  31. # define readunsigned(a)    (void) fscanf (yyf, "%u", & a);
  32. # define writeunsigned(a)    (void) fprintf (yyf, "%u", a);
  33. # define getunsigned(a)        yyGet ((char *) & a, sizeof (a));
  34. # define putunsigned(a)        yyPut ((char *) & a, sizeof (a));
  35. # define copyunsigned(a, b)        
  36. # define equalunsigned(a, b)    a == b
  37. float
  38. # define beginfloat(a)        
  39. # define closefloat(a)        
  40. # define readfloat(a)        (void) fscanf (yyf, "%g", & a);
  41. # define writefloat(a)        (void) fprintf (yyf, "%g", a);
  42. # define getfloat(a)        yyGet ((char *) & a, sizeof (a));
  43. # define putfloat(a)        yyPut ((char *) & a, sizeof (a));
  44. # define copyfloat(a, b)        
  45. # define equalfloat(a, b)    a == b
  46. double
  47. # define begindouble(a)        
  48. # define closedouble(a)        
  49. # define readdouble(a)        (void) fscanf (yyf, "%lg", & a);
  50. # define writedouble(a)        (void) fprintf (yyf, "%lg", a);
  51. # define getdouble(a)        yyGet ((char *) & a, sizeof (a));
  52. # define putdouble(a)        yyPut ((char *) & a, sizeof (a));
  53. # define copydouble(a, b)        
  54. # define equaldouble(a, b)    a == b
  55. bool
  56. # define beginbool(a)        
  57. # define closebool(a)        
  58. # define readbool(a)        a = fgetc (yyf) == 'T';
  59. # define writebool(a)        (void) fputc (a ? 'T' : 'F', yyf);
  60. # define getbool(a)        yyGet ((char *) & a, sizeof (a));
  61. # define putbool(a)        yyPut ((char *) & a, sizeof (a));
  62. # define copybool(a, b)        
  63. # define equalbool(a, b)    a == b
  64. char
  65. # define beginchar(a)        
  66. # define closechar(a)        
  67. # define readchar(a)        a = fgetc (yyf);
  68. # define writechar(a)        (void) fputc (a, yyf);
  69. # define getchar(a)        yyGet ((char *) & a, sizeof (a));
  70. # define putchar(a)        yyPut ((char *) & a, sizeof (a));
  71. # define copychar(a, b)        
  72. # define equalchar(a, b)    a == b
  73. tString
  74. # define begintString(a)    
  75. # define closetString(a)    
  76. # define readtString(a)        
  77. # define writetString(a)    (void) fputs (a, yyf);
  78. # define gettString(a)        
  79. # define puttString(a)        
  80. # define copytString(a, b)        
  81. # define equaltString(a, b)    strcmp (a, b)
  82. tStringRef
  83. # define begintStringRef(a)    
  84. # define closetStringRef(a)    
  85. # define readtStringRef(a)    
  86. # define writetStringRef(a)    WriteString (yyf, a);
  87. # define gettStringRef(a)    
  88. # define puttStringRef(a)    
  89. # define copytStringRef(a, b)        
  90. # define equaltStringRef(a, b)    a == b
  91. tIdent
  92. # define begintIdent(a)        
  93. # define closetIdent(a)        
  94. # define readtIdent(a)        a = yyReadIdent ();
  95. # define writetIdent(a)        WriteIdent (yyf, a);
  96. # define gettIdent(a)        yyGetIdent (& a);
  97. # define puttIdent(a)        yyPutIdent (a);
  98. # define copytIdent(a, b)        
  99. # define equaltIdent(a, b)    a == b
  100. tSet
  101. # define begintSet(a)        
  102. # define closetSet(a)        
  103. # define readtSet(a)        ReadSet (yyf, & a);
  104. # define writetSet(a)        WriteSet (yyf, & a);
  105. # define gettSet(a)        
  106. # define puttSet(a)        
  107. # define copytSet(a, b)        
  108. # define equaltSet(a, b)    IsEqual (& a, & b)
  109. tPosition
  110. # define begintPosition(a)        
  111. # define closetPosition(a)        
  112. # define readtPosition(a)
  113. # define writetPosition(a)    WritePosition (yyf, a);
  114. # define gettPosition(a)        
  115. # define puttPosition(a)        
  116. # define copytPosition(a, b)        
  117. # define equaltPosition(a, b)    Compare (a, b) == 0
  118.